home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d13 / patch12.arc / TCPATCH5.DIF < prev    next >
Text File  |  1990-10-02  |  4KB  |  175 lines
  1. TurboC2.0 Patches to fix pipe bugs
  2. Prereq: 4
  3. *** tcpatlev.h    Wed Jul 18 15:48:16 1990
  4. --- tcpatlev.new    Tue Aug 07 08:31:10 1990
  5. ***************
  6. *** 1,1 ****
  7. ! #define TCPATCHLEVEL 4
  8. --- 1,1 ----
  9. ! #define TCPATCHLEVEL 5
  10. *** readme    Wed Jul 18 15:39:48 1990
  11. --- readme.new    Tue Aug 07 08:31:10 1990
  12. ***************
  13. *** 182,184 ****
  14. --- 182,201 ----
  15.   in the current implementation.
  16.   
  17.   (this bug is now fixed)
  18. + 
  19. + 
  20. + *** OFFICIAL PATCHLEVEL 12, TurboC2.0 PATCHLEVEL 5
  21. + 
  22. + From: aas@cc.uq.oz.au (Alex Sergejew)
  23. + Date: Fri, 20 Jul 90 23:56:13 EST
  24. + 
  25. + The problem is that whatever ed is doing it's not accepting the
  26. + redirected stdin from the shelled COMMAND.COM and so it stalls.  When you
  27. + hit q it unstalls and also returns normally but hasn't read the ed script.
  28. +
  29. + Appended find *more* patches, this time to a pipe package that *does* work
  30. + the way it ought to, along with appropriate mods to pch.c and makefile
  31. + (ie patches to my patches to your patches to etc).  The pipe package here
  32. + was snarfed from an old edition of lharc and is more limited than the fancy
  33. + one I posted but it works just fine with patch (it does stdin redirection
  34. + from the invocation of the spawned COMMAND.COM - quite foolproof).
  35. *** makefile.bak    Sun Jul 15 15:59:34 1990
  36. --- makefile    Fri Jul 20 21:54:12 1990
  37. ***************
  38. *** 1,14 ****
  39.   CC = tcc
  40.   CFLAGS = -N -ml -DTURBOC20
  41.   
  42. ! c = patch.c pch.c inp.c version.c util.c popen.c getswitc.c
  43. ! obj = patch.obj pch.obj inp.obj version.obj util.obj popen.obj getswitc.obj
  44.   
  45.   .c.obj:
  46.       $(CC) -c $(CFLAGS) $(LARGE) $*.c
  47.   
  48.   patch.exe: $(obj)
  49. !     $(CC) -epatch $(CFLAGS) $(obj)
  50.   
  51.   patch.obj: config.h common.h patch.c inp.h pch.h util.h version.h
  52.   
  53. --- 1,17 ----
  54.   CC = tcc
  55.   CFLAGS = -N -ml -DTURBOC20
  56. + LFLAGS = -ml
  57.   
  58. ! #c = patch.c pch.c inp.c version.c util.c popen.c getswitc.c
  59. ! #obj = patch.obj pch.obj inp.obj version.obj util.obj popen.obj getswitc.obj
  60. ! c = patch.c pch.c inp.c version.c util.c pipes.c
  61. ! obj = patch.obj pch.obj inp.obj version.obj util.obj pipes.obj
  62.   
  63.   .c.obj:
  64.       $(CC) -c $(CFLAGS) $(LARGE) $*.c
  65.   
  66.   patch.exe: $(obj)
  67. !     $(CC) -epatch $(LFLAGS) $(obj)
  68.   
  69.   patch.obj: config.h common.h patch.c inp.h pch.h util.h version.h
  70.   
  71. *** pch.bak    Sun Jul 15 18:54:58 1990
  72. --- pch.c    Fri Jul 20 22:17:22 1990
  73. ***************
  74. *** 41,49 ****
  75.   #include "util.h"
  76.   #include "INTERN.h"
  77.   #include "pch.h"
  78. - #ifdef TURBOC20
  79. - #include "popen.h"
  80. - #endif
  81.   
  82.   /* Patch (diff listing) abstract type. */
  83.   
  84. --- 41,46 ----
  85. *** /dev/null
  86. --- pipes.c    Fri Jul 20 21:52:54 1990
  87. ***************
  88. *** 0 ****
  89. --- 1,84 ----
  90. + /* a simulation for the Unix popen() and pclose() calls on MS-DOS */
  91. + /* only one pipe can be open at a time */
  92. + 
  93. + #include <stdio.h>
  94. + #include <stdlib.h>
  95. + #include <string.h>
  96. + #include <io.h>
  97. + 
  98. + static char pipename[128], command[128];
  99. + static int wrpipe;
  100. + 
  101. + static void Mktemp(char *);
  102. + 
  103. + FILE *popen(char *cmd, char *flags)
  104. + {
  105. +   wrpipe = (strchr(flags, 'w') != NULL);
  106. + 
  107. +   if ( wrpipe )
  108. +   {
  109. +     strcpy(command, cmd);
  110. +     strcpy(pipename, "~WXXXXXX");
  111. +     Mktemp(pipename);
  112. +     return fopen(pipename, flags);  /* ordinary file */
  113. +   }
  114. +   else
  115. +   {
  116. +     strcpy(pipename, "~RXXXXXX");
  117. +     Mktemp(pipename);
  118. +     strcpy(command, cmd);
  119. +     strcat(command, ">");
  120. +     strcat(command, pipename);
  121. +     system(command);
  122. +     return fopen(pipename, flags);  /* ordinary file */
  123. +   }
  124. + }
  125. + 
  126. + int pclose(FILE *pipe)
  127. + {
  128. +   int rc;
  129. + 
  130. +   if ( fclose(pipe) == EOF )
  131. +     return EOF;
  132. + 
  133. +   if ( wrpipe )
  134. +   {
  135. +     if ( command[strlen(command) - 1] == '!' )
  136. +       command[strlen(command) - 1] = 0;
  137. +     else
  138. +       strcat(command, "<");
  139. + 
  140. +     strcat(command, pipename);
  141. +     rc = system(command);
  142. +     unlink(pipename);
  143. +     return rc;
  144. +   }
  145. +   else
  146. +   {
  147. +     unlink(pipename);
  148. +     return 0;
  149. +   }
  150. + }
  151. + 
  152. + static
  153. + void Mktemp(char *file)
  154. + {
  155. +   char fname[32], *tmp, *bsp;
  156. + 
  157. +   tmp = getenv("TMP");
  158. + 
  159. +   if ( tmp != NULL )
  160. +   {
  161. +     strcpy(fname, file);
  162. +     bsp = strcpy(file, tmp);
  163. +     while ((bsp=strchr(bsp, '/')) != NULL)
  164. +         *bsp = '\\';
  165. + 
  166. +     if ( file[strlen(file) - 1] != '\\' )
  167. +       strcat(file, "\\");
  168. + 
  169. +     strcat(file, fname);
  170. +   }
  171. + 
  172. +   mktemp(file);
  173. + }
  174.  
  175.